COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	\magnification\magstephalf
C00005 ENDMK
C⊗;
\magnification\magstephalf
\input macro.tex
\def\today{\ifcase\month\or
  January\or February\or March\or April\or May\or June\or
  July\or August\or September\or October\or November\or December\fi
  \space\number\day, \number\year}
\baselineskip 14pt
\rm
\line{\sevenrm a94.tex[106,phy] \today\hfill}

\font\rmn=cmr9
\bigskip
\line{\bf Problem 1. (P01,PGO)\hfil}

When assignments say to write, run, or execute a program, assume that this
includes execution of the program and turning in printouts of program,
input if any, and output.

Enter this program and execute it. Turn in printouts of the program and its
output.

{\obeylines\obeyspaces\let =\ \tt
        PROGRAM SQRTTBL(OUTPUT);
        VAR I: INTEGER;
        BEGIN
        WRITELN('           I           SQRT(I)');
        FOR I:=1 TO 50 DO
           WRITELN(I, SQRT(I))
        END.
}

Then, using {\tt EDIT}, modify the program to print the natural logarithm
({\tt LN}) of each integer from~1 to~20, and execute it again.

Also, send me electronic mail (use {\tt @HELP MAIL} or the Overview)
with your real name, user name, year, major, and anything you feel like adding.



\bigskip
\line{\copyright 1984 Robert W. Floyd\hfill}
\line{First draft (not published) October 3, 1985;\hfil}
%revised: Date; subsequently revised.\hfill}

\bye